home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Magazine / Online / QMail / source / envread.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-04-15  |  439 b   |  31 lines
  1. #include "env.h"
  2. #include "str.h"
  3.  
  4. extern /*@null@*/char *env_get(s)
  5. char *s;
  6. {
  7.   int i;
  8.   unsigned int slen;
  9.   char *envi;
  10.  
  11.   slen = str_len(s);
  12.   for (i = 0;envi = environ[i];++i)
  13.     if ((!str_diffn(s,envi,slen)) && (envi[slen] == '='))
  14.       return envi + slen + 1;
  15.   return 0;
  16. }
  17.  
  18. extern char *env_pick()
  19. {
  20.   return environ[0];
  21. }
  22.  
  23. extern char *env_findeq(s)
  24. char *s;
  25. {
  26.   for (;*s;++s)
  27.     if (*s == '=')
  28.       return s;
  29.   return 0;
  30. }
  31.